
Public Class NamesGlobal
    Private Shared DoLog As Boolean = False
    Private Shared LSIDAuthority As String = ""

    Public Shared Sub Init()
        Try
            DoLog = (Configuration.ConfigurationManager.AppSettings("Logging") = "on")
            LSIDAuthority = Configuration.ConfigurationManager.AppSettings("LSIDAutority")

        Catch ex As Exception
        End Try
    End Sub

    Public Shared ReadOnly Property DoLogging() As Boolean
        Get
            Return DoLog
        End Get
    End Property

    Public Shared ReadOnly Property LSIDAuthorityText() As String
        Get
            Return LSIDAuthority
        End Get
    End Property
End Class
